From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 12 Mar 1993 21:42:58 +0000 (+0000)
Subject: (internal_self_insert): Check that tab_width does not
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96901
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=2234dd63ea532b1bd8677b8e46201c2f4135b171;p=emacs.git

(internal_self_insert): Check that tab_width does not
exceed 20, to be consistent with indent.c and xdisp.c.
---

diff --git a/src/cmds.c b/src/cmds.c
index 8a6fb19535c..9dfd2b48a8f 100644
--- a/src/cmds.c
+++ b/src/cmds.c
@@ -283,6 +283,7 @@ internal_self_insert (c1, noautofill)
       && (overwrite_binary_mode
 	  || FETCH_CHAR (point) != '\t'
 	  || XINT (current_buffer->tab_width) <= 0
+	  || XFASTINT (current_buffer->tab_width) > 20
 	  || !((current_column () + 1) % XFASTINT (current_buffer->tab_width))))
     {
       del_range (point, point + 1);